home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue62 / ClassEng / Listing1.pas next >
Encoding:
Pascal/Delphi Source File  |  2000-09-01  |  264 b   |  17 lines

  1. Listing 1
  2.  
  3. TParent = class(TObject)
  4. private
  5.   ParNbr1: Integer;
  6.   ParNbr2: Integer;
  7. public
  8.   procedure DoSomethingParental;
  9. end;
  10. TChild = class(TParent)
  11. private
  12.   ChldNbrA: Integer;
  13.   ChldNbrB: Integer;
  14. public
  15.   procedure DoSomethingChildish;
  16. end;
  17.